home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-02
/
tpapi1.zip
/
NWPRINT.PA1
< prev
next >
Wrap
Text File
|
1991-12-04
|
4KB
|
77 lines
{!R! FONT 15; FTMD 15; EXIT;}
{***************************************************************************}
{** Program : NWPRINT **}
{***************************************************************************}
{** Version : 1.0b ** Started : 11/11/91 ** Ended : / / **}
{***************************************************************************}
{******************************** Description ******************************}
{***************************************************************************}
{** OOP library for Netware API **}
{** **}
{** This unit forms the second level object : PRINT **}
{** This object is a descandent of : NETWARE **}
{** **}
{** **}
{** **}
{** **}
{***************************************************************************}
{******************************** Information ******************************}
{***************************************************************************}
{** **}
{** **}
{** **}
{** **}
{** This code is (c) 1991 Tony Covelli, **}
{** Portions (c) Novell Inc, **}
{** **}
{** **}
{***************************************************************************}
{$I NETWARE.INC}
UNIT NWPRINT;
INTERFACE
USES
netware, nwvar;
TYPE
pPrintOBJ = ^PrintOBJ;
PrintOBJ = object (NetwareOBJ)
constructor Init;
FUNCTION CancelLPTCapture : WORD;
FUNCTION CancelSpecificLPTCapture (LPTDevice : BYTE) : WORD;
FUNCTION ENDLPTCapture : WORD;
FUNCTION ENDSpecificLPTCapture (LPTDevice : BYTE) : WORD;
FUNCTION FlushLPTCapture : WORD;
FUNCTION FlushSpecificLPTCapture (LPTDevice : BYTE) : WORD;
FUNCTION GetBannerUserName (VAR BannerUserName : BannerUserNameType) : WORD;
FUNCTION GetDefaultCaptureFlags (VAR CaptureFlags : Capture_Flags) : WORD;
FUNCTION GetDefaultLocalPrinter : WORD;
FUNCTION GetLPTCaptureStatus (VAR LPTServerNumber : WORD) : WORD;
FUNCTION GetPrinterQueue (PrinterNumber : BYTE; VAR QueueID : OT_BinderyID) : WORD;
FUNCTION GetPrinterStatus (PrinterNumber : BYTE; VAR PrinterHalted, PrinterOffLine, FormType,
TargetPrinter : BYTE) : WORD;
FUNCTION GetSpecificCaptureFlags (LPTDevice : BYTE; VAR CaptureFlags : Capture_Flags) : WORD;
FUNCTION SetBannerUserName (BannerUserName : BannerUserNameType) : WORD;
FUNCTION SetCapturePrintJob (LPTDevice : BYTE; JobNumber : WORD; VAR JobFileHandle) : WORD;
FUNCTION SetCapturePrintQueue (LPTDevice : BYTE; ConnectionID : BYTE; QueueID : OT_BinderyID) : WORD;
FUNCTION SetDefaultCaptureFlags (CaptureFlags : Set_Capture_Flags) : WORD;
FUNCTION SetDefaultLocalPrinter (LPTDevice : BYTE) : WORD;
FUNCTION SetSpecificCaptureFlags (LPTDevice : BYTE; CaptureFlags : Set_Capture_Flags) : WORD;
FUNCTION SetSpoolFlags (PrintFlags : BYTE; TabSize, PrinterNumber, NumberOfCopies, FormType : WORD;
BannerUserName : BannerUserNameType) : WORD;
FUNCTION SpecifyCaptureFile (DriveHandle : BYTE; FilePath : PathNameType) : WORD;
FUNCTION StartLPTCapture : WORD;
FUNCTION StartSpecificLPTCapture (LPTDevice : BYTE) : WORD;
destructor Done; virtual;
END;